home *** CD-ROM | disk | FTP | other *** search
/ SIGGRAPH 2002 Course Notes / SIGGRAPH 2002 - Course Notes - Disc 1.iso / pc / notes / 05 / supplemental_material / RNL_Source / gensup1a.sh < prev    next >
Encoding:
Text File  |  1999-01-02  |  621 b   |  19 lines
  1. #
  2. # Arguments to gensup1.sh:
  3. # 1:name 2:base_material 3:top_material
  4. #
  5.  
  6. genworm $2 {$1}a "0" "0.1+1.5*t" "1-.5*sin(2.9*(t))" "0.10-0.04*t" 12 | xform -ry 0
  7. genworm $2 {$1}a "0" "0.1+1.5*t" "1-.5*sin(2.9*(t))" "0.10-0.04*t" 12 | xform -ry 120
  8. genworm $2 {$1}a "0" "0.1+1.5*t" "1-.5*sin(2.9*(t))" "0.10-0.04*t" 12 | xform -ry 240
  9.  
  10. #genrev $2 {$1}t "-0.07 * cos(2*PI*t)" "0.5 - 0.07*sin(2*PI*t)" 30 | xform -rx 90 -t 0 0.95 0
  11.  
  12. genworm $2 {$1}t "0.35*cos(2*PI*t)+0.15*sin(4*PI*(t+0.25))" "0" "0.35*sin(2*PI*t)+0.15*cos(4*PI*(t+0.25))" "0.07" 36 | xform -t 0 0.95 0
  13.  
  14. echo $3 sphere {$1}ball
  15. echo 0
  16. echo 0
  17. echo 4 0 2.64 0 1.3
  18.  
  19.